fix preceding-char

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index d2ead1f16494448e6805fe277082a8aa69f9e0c8..d7b4123a21c6a8170948bf5a53c164a8ea39fb38 100644 (file)
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -595,7 +595,7 @@ the annotation emission."
       (byte-point-min auto)
       (byte-char-after auto)
       (byte-following-char auto)
-      (byte-preceding-char auto)
+      (byte-preceding-char preceding-char Fprevious_char)
       (byte-current-column auto)
       (byte-indent-to auto)
       (byte-scan-buffer-OBSOLETE)